home *** CD-ROM | disk | FTP | other *** search
/ Games Gallery 98 / Games Gallery 98 - Disc 1.iso / Content / DOMINATN / dom1.exe / RAND.RPP < prev    next >
Encoding:
Text File  |  1996-10-19  |  104 b   |  10 lines
  1. {Random Numbers}
  2.  
  3. randomize;
  4.  
  5. var n: number;
  6.  
  7. loop(n=1 to 20)
  8.   println(rand(1, 1000));
  9. endl;
  10.